home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / kernel / jumpto / jumpto.b32 < prev    next >
Text File  |  1995-08-08  |  823b  |  47 lines
  1. ;
  2. ;  Jumpto for Borland 32 bit
  3. ;
  4.     .386p
  5.     ifndef    ??version
  6. ?debug    macro
  7.     endm
  8.     endif
  9.     ?debug    S "JUMPTO.C"
  10.     ?debug    T "JUMPTO.C"
  11. _TEXT    segment byte public use32 'CODE'
  12. _TEXT    ends
  13. _DATA    segment dword public use32 'DATA'
  14. _DATA    ends
  15. _BSS    segment dword public use32 'BSS'
  16. _BSS    ends
  17. DGROUP    group    _DATA,_BSS
  18.     assume    cs:_TEXT,ds:DGROUP
  19. _TEXT    segment byte public use32 'CODE'
  20. c@    label    byte
  21.     assume    cs:_TEXT
  22. __jumpToMethod    proc    near
  23. @5@44:
  24.     add    esp,8
  25.     pop    ebp
  26.     jmp    eax
  27. @7:
  28. @7@0:
  29.     ret
  30. __jumpToMethod    endp
  31. _TEXT    ends
  32.     ?debug    D "JUMPTO.C" 7792 24239
  33. _s@    equ    s@
  34.     public    __jumpToMethod
  35. _DATA    segment dword public use32 'DATA'
  36. d@    label    byte
  37. d@w    label    word
  38. d@d    label    dword
  39. s@    label    byte
  40. _DATA    ends
  41. _BSS    segment dword public use32 'BSS'
  42. b@    label    byte
  43. b@w    label    word
  44. b@d    label    dword
  45. _BSS    ends
  46.     end
  47.